home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / SYMBOL / Symbol Processors / Reflect / symbol-inversion-symmetric next >
Encoding:
Text File  |  1998-10-23  |  534 b   |  9 lines  |  [TEXT/ScoM]
  1. symbol-inversion-symmetric inv-point symbol-pattern scale
  2.  
  3. Using scale, this function constructs an inverted list of symbol-pattern at inv-point, and returns the new list. Also chord symbols are inverted. When the returned pattern is mapped onto the scale, the output is symmetrical compared to the same symbol-pattern mapped on the same scale. Diatonic inversion is achieved with symbol-inversion.
  4.  
  5. (symbol-inversion-symmetric 
  6.        '(c 4)
  7.        '(a b = c d e)
  8.        (activate-tonality (major c 4)))
  9. --> (a (-1 -b) (-1 -c) -d -e)